Paper Flowers 2

=><= { (textsize: 3) [''(text-color: (rgb:0,153,77))[P](text-color: (rgb:255,30,103))[a](text-color: (rgb:255,180,182))[p](text-color: (rgb: 138,57,145))[e](text-color: (rgb:60,4,223))[r](text-color: (rgb:238,130,220))[ F](text-color: (rgb:183,15,86))[l](text-color: (rgb:196,227,199))[o](text-color: (rgb:245,184,22))[w](text-color: (rgb:211,26,5))[e](text-color: (rgb:101,196,6))[r](text-color: (rgb:186,163,222))[s] 2''] } (enchantin: ?link, (textcolor: "white"))[ [[New Game]] ] { (if: (savedgames:) contains "Slot A") [(enchantin: ?link, (textcolor: "white")) [(link: "Load Game") [(load-game:"Slot A")] ] ] } (enchantin: ?link, (textcolor: "white"))[ [[Free Play]] ] (textsize:0.5)[Version 0.05. Copyright Ryan Sartor 2022. (linkrepeat:"Credits.")[(dialog: "Game by Ryan Sartor. Pixel Hanafuda is copyright Ryan Sartor 2020. MSPaint Hanafuda is licensed CC-0 1.0 by Sem. Vaporwave Hanafuda is licensed CC-0 1.0 by Heavenlysome. Louie Mantia's hanafuda design is licensed CC BY-SA 4.0.", "Sweet.")]] (hide: ?footer)

Yep, this is the place. As you stand out front, considering the face of the building, the panel door to the domicile swiftly slides open, revealing a thin but imposingly tall figure silhouetted by the dim lanterns behind him. He greets you pleasantly and bids you enter. Do you step forward to follow the tall man [[into the house->Exploring]], or take a few steps backwards while you really [[consider his offer]] of hospitality? { (set: $glasses to "name") (set: $lock2 to true, $lock3 to true, $lock4 to true, $lock5 to true, $lock6 to true, $lock7 to true, $lock8 to true, $lock9 to true, $lock10 to true, $lock11 to true, $lock12 to true) (set: num-type $fooltokens to 0, num-type $bakawins to 0, num-type $bakadraws to 0, num-type $bakalosses to 0, num-type $bakahigh to 0, bool-type $bakamydeal to false) (set: num-type $atowins to 0, num-type $atodraws to 0, num-type $atolosses to 0, $atohigh to "N/A") (set: bool-type $locktrue to true, num-type $truthtokens to 0, num-type $honwins to 0, num-type $hondraws to 0, num-type $honlosses to 0, $honhigh to (a: 0, 0), bool-type $honmydeal to false) (set: num-type $tokowins to 0, num-type $tokodraws to 0, num-type $tokolosses to 0, $tokohigh to "N/A") (set: bool-type $lockmushi to true, num-type $mushitokens to 0, num-type $mushiwins to 0, num-type $mushidraws to 0, num-type $mushilosses to 0, num-type $mushihigh to 0, bool-type $mushideal to false) (set: bool-type $lockyama to true, num-type $yamatokens to 0, num-type $yamawins to 0, $yamadraws to "N/A", num-type $yamalosses to 0, num-type $yamahigh to 0, bool-type $yamadeal to false) (set: bool-type $lockkoi to true, num-type $koitokens to 0, num-type $koiwins to 0, num-type $koidraws to 0, num-type $koilosses to 0, num-type $koihigh to 0, bool-type $koideal to false ) (set: bool-type $locknuki to true, num-type $nukitokens to 0, num-type $nukiwins to 0, $nukidraws to "N/A", num-type $nukilosses to 0, num-type $nukihigh to 0, bool-type $nukideal to false) (set: $gamemode to 0) (set: $has_tea to false) (set: $keys to 1) (set: $room to "F10", $x to 6, $y to 10) }

Double-click this passage to edit it.

{ (set: const-type $pine1 to (dm: "name", "some (text-color: (rgb:0,153,77))[Pine] trees", "suit", "(text-color: (rgb:0,153,77))[Pine]", "type", "chaff", "kabu", 1, "nkabu", 1, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/pine1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/pine1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/pine1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/pine1.png" width="90" height="150" />' ) ) (set: const-type $pine2 to (dm: "name", "some green (text-color: (rgb:0,153,77))[Pines]", "suit", "(text-color: (rgb:0,153,77))[Pine]", "type", "chaff", "kabu", 1, "nkabu", 1, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/pine2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/pine2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/pine2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/pine2.png" width="90" height="150" />' ) ) (set: const-type $pine3 to (dm: "name", "the (text-color: (rgb:0,153,77))[Pine] with Poetry ~~Ribbon~~", "suit", "(text-color: (rgb:0,153,77))[Pine]", "type", "~~Ribbon~~", "kabu", 1, "nkabu", 1, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/pine3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/pine3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/pine3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/pine3.png" width="90" height="150" />' ) ) (set: const-type $pine4 to (dm: "name", "the (text-color: (rgb:0,153,77))[Pine] with ''Crane and Sun''", "suit", "(text-color: (rgb:0,153,77))[Pine]", "type", "''Bright''", "kabu", 1, "nkabu",1, "val", 20, "honval", 30, "yamaval", 50, "sakuval", 20, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/pine4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/pine4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/pine4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/pine4.png" width="90" height="150" />' ) ) (set: const-type $plum1 to (dm: "name", "some (text-color: (rgb:255,30,103))[Plum Blossoms]", "suit", "(text-color: (rgb:255,30,103))[Plum Blossom]", "type", "chaff", "kabu", 2, "nkabu", 12, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/plum1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/plum1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/plum1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/plum1.png" width="90" height="150" />' ) ) (set: const-type $plum2 to (dm: "name", "a branch full of (text-color: (rgb:255,30,103))[Plum Blossoms]", "suit", "(text-color: (rgb:255,30,103))[Plum Blossom]", "type", "chaff", "kabu", 2, "nkabu", 12, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/plum2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/plum2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/plum2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/plum2.png" width="90" height="150" />' ) ) (set: const-type $plum3 to (dm: "name", "the (text-color: (rgb:255,30,103))[Plum Blossom] with Poetry ~~Ribbon~~", "suit", "(text-color: (rgb:255,30,103))[Plum Blossom]", "type", "~~Ribbon~~", "kabu", 2, "nkabu", 12, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/plum3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/plum3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/plum3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/plum3.png" width="90" height="150" />' ) ) (set: const-type $plum4 to (dm: "name", "the (text-color: (rgb:255,30,103))[Plum Blossom] with //Warbler//", "suit", "(text-color: (rgb:255,30,103))[Plum Blossom]", "type", "//Subject//", "kabu", 2, "nkabu", 12, "val", 10, "honval", 20, "yamaval", 50, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/plum4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/plum4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/plum4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/plum4.png" width="90" height="150" />' ) ) (set: const-type $cherry1 to (dm: "name", "(text-color: (rgb:255,180,182))[Cherry Blossom] branches", "suit", "(text-color: (rgb:255,180,182))[Cherry Blossom]", "type", "chaff", "kabu", 3, "nkabu", 3, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/cherry1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/cherry1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/cherry1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/cherry1.png" width="90" height="150" />' ) ) (set: const-type $cherry2 to (dm: "name", "pink and red (text-color: (rgb:255,180,182))[Cherry Blossoms]", "suit", "(text-color: (rgb:255,180,182))[Cherry Blossom]", "type", "chaff", "kabu", 3, "nkabu", 3, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/cherry2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/cherry2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/cherry2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/cherry2.png" width="90" height="150" />' ) ) (set: const-type $cherry3 to (dm: "name", "the (text-color: (rgb:255,180,182))[Cherry Blossom] with Poetry ~~Ribbon~~", "suit", "(text-color: (rgb:255,180,182))[Cherry Blossom]", "type", "~~Ribbon~~", "kabu", 3, "nkabu", 3, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/cherry3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/cherry3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/cherry3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/cherry3.png" width="90" height="150" />' ) ) (set: const-type $cherry4 to (dm: "name", "the (text-color: (rgb:255,180,182))[Cherry Blossom] with ''Curtain''", "suit", "(text-color: (rgb:255,180,182))[Cherry Blossom]", "type", "''Bright''", "kabu", 3, "nkabu", 3, "val", 20, "honval", 30, "yamaval", 50, "sakuval", 20, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/cherry4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/cherry4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/cherry4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/cherry4.png" width="90" height="150" />' ) ) (set: const-type $fuji1 to (dm: "name", "(text-color: (rgb: 138,57,145))[Wisteria] vines", "suit", "(text-color: (rgb: 138,57,145))[Wisteria]", "type", "chaff", "kabu", 4, "nkabu", 4, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/fuji1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/fuji1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/fuji1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/fuji1.png" width="90" height="150" />' ) ) (set: const-type $fuji2 to (dm: "name", "some hanging (text-color: (rgb: 138,57,145))[Wisteria]", "suit", "(text-color: (rgb: 138,57,145))[Wisteria]", "type", "chaff", "kabu", 4, "nkabu", 4, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/fuji2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/fuji2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/fuji2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/fuji2.png" width="90" height="150" />' ) ) (set: const-type $fuji3 to (dm: "name", "the (text-color: (rgb: 138,57,145))[Wisteria] with Red ~~Ribbon~~", "suit", "(text-color: (rgb: 138,57,145))[Wisteria]", "type", "~~Ribbon~~", "kabu", 4, "nkabu", 4, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/fuji3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/fuji3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/fuji3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/fuji3.png" width="90" height="150" />' ) ) (set: const-type $fuji4 to (dm: "name", "the (text-color: (rgb: 138,57,145))[Wisteria] with //Cuckoo//", "suit", "(text-color: (rgb: 138,57,145))[Wisteria]", "type", "//Subject//", "kabu", 4, "nkabu", 4, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/fuji4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/fuji4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/fuji4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/fuji4.png" width="90" height="150" />' ) ) (set: const-type $iris1 to (dm: "name", "an (text-color: (rgb:60,4,223))[Iris] with floppy leaves", "suit", "(text-color: (rgb:60,4,223))[Iris]", "type", "chaff", "kabu", 5, "nkabu", 5, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/iris1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/iris1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/iris1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/iris1.png" width="90" height="150" />' ) ) (set: const-type $iris2 to (dm: "name", "a single, deep blue (text-color: (rgb:60,4,223))[Iris]", "suit", "(text-color: (rgb:60,4,223))[Iris]", "type", "chaff", "kabu", 5, "nkabu", 5, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/iris2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/iris2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/iris2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/iris2.png" width="90" height="150" />' ) ) (set: const-type $iris3 to (dm: "name", "the (text-color: (rgb:60,4,223))[Iris] with Red ~~Ribbon~~", "suit", "(text-color: (rgb:60,4,223))[Iris]", "type", "~~Ribbon~~", "kabu", 5, "nkabu", 5, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/iris3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/iris3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/iris3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/iris3.png" width="90" height="150" />' ) ) (set: const-type $iris4 to (dm: "name", "the (text-color: (rgb:60,4,223))[Iris] with //Bridge//", "suit", "(text-color: (rgb:60,4,223))[Iris]", "type", "//Subject//", "kabu", 5, "nkabu", 5, "val", 10, "honval", 20, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/iris4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/iris4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/iris4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/iris4.png" width="90" height="150" />' ) ) (set: const-type $peony1 to (dm: "name", "a large red (text-color: (rgb:238,130,220))[Peony]", "suit", "(text-color: (rgb:238,130,220))[Peony]", "type", "chaff", "kabu", 6, "nkabu", 11, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/peony1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/peony1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/peony1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/peony1.png" width="90" height="150" />' ) ) (set: const-type $peony2 to (dm: "name", "one large and one small (text-color: (rgb:238,130,220))[Peony]", "suit", "(text-color: (rgb:238,130,220))[Peony]", "type", "chaff", "kabu", 6, "nkabu", 11, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/peony2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/peony2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/peony2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/peony2.png" width="90" height="150" />' ) ) (set: const-type $peony3 to (dm: "name", "the (text-color: (rgb:238,130,220))[Peony] with Blue ~~Ribbon~~", "suit", "(text-color: (rgb:238,130,220))[Peony]", "type", "~~Ribbon~~", "kabu", 6, "nkabu", 11, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/peony3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/peony3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/peony3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/peony3.png" width="90" height="150" />' ) ) (set: const-type $peony4 to (dm: "name", "the (text-color: (rgb:238,130,220))[Peony] with //Butterflies//", "suit", "(text-color: (rgb:238,130,220))[Peony]", "type", "//Subject//", "kabu", 6, "nkabu", 11, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/peony4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/peony4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/peony4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/peony4.png" width="90" height="150" />' ) ) (set: const-type $hagi1 to (dm: "name", "a left-facing (text-color: (rgb:183,15,86))[Bush Clover]", "suit", "(text-color: (rgb:183,15,86))[Bush Clover]", "type", "chaff", "kabu", 7, "nkabu", 7, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/hagi1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/hagi1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/hagi1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/hagi1.png" width="90" height="150" />' ) ) (set: const-type $hagi2 to (dm: "name", "a right-facing (text-color: (rgb:183,15,86))[Bush Clover]", "suit", "(text-color: (rgb:183,15,86))[Bush Clover]", "type", "chaff", "kabu", 7, "nkabu", 7, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/hagi2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/hagi2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/hagi2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/hagi2.png" width="90" height="150" />' ) ) (set: const-type $hagi3 to (dm: "name", "the (text-color: (rgb:183,15,86))[Bush Clover] with Red ~~Ribbon~~", "suit", "(text-color: (rgb:183,15,86))[Bush Clover]", "type", "~~Ribbon~~", "kabu", 7, "nkabu", 7, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/hagi3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/hagi3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/hagi3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/hagi3.png" width="90" height="150" />' ) ) (set: const-type $hagi4 to (dm: "name", "the (text-color: (rgb:183,15,86))[Bush Clover] with //Boar//", "suit", "(text-color: (rgb:183,15,86))[Bush Clover]", "type", "//Subject//", "kabu", 7, "nkabu", 7, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/hagi4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/hagi4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/hagi4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/hagi4.png" width="90" height="150" />' ) ) (set: const-type $grass1 to (dm: "name", "rolling (text-color: (rgb:196,227,199))[Grassy] hills", "suit", "(text-color: (rgb:196,227,199))[Grass]", "type", "chaff", "kabu", 8, "nkabu", 8, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/grass1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/grass1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/grass1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/grass1.png" width="90" height="150" />' ) ) (set: const-type $grass2 to (dm: "name", "a field of silver (text-color: (rgb:196,227,199))[Grass] on a hill", "suit", "(text-color: (rgb:196,227,199))[Grass]", "type", "chaff", "kabu", 8, "nkabu", 8, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/grass2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/grass2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/grass2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/grass2.png" width="90" height="150" />' ) ) (set: const-type $grass3 to (dm: "name", "the //Geese// over a (text-color: (rgb:196,227,199))[Grassy] hill", "suit", "(text-color: (rgb:196,227,199))[Grass]", "type", "//Subject//", "kabu", 8, "nkabu", 8, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 10, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/grass3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/grass3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/grass3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/grass3.png" width="90" height="150" />' ) ) (set: const-type $grass4 to (dm: "name", "the ''Full Moon'' over a (text-color: (rgb:196,227,199))[Grassy] hill", "suit", "(text-color: (rgb:196,227,199))[Grass]", "type", "''Bright''", "kabu", 8, "nkabu", 8, "val", 20, "honval", 30, "yamaval", 50, "sakuval", 20, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/grass4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/grass4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/grass4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/grass4.png" width="90" height="150" />' ) ) (set: const-type $kiku1 to (dm: "name", "a red and yellow (text-color: (rgb:245,184,22))[Chrysanthemum]", "suit", "(text-color: (rgb:245,184,22))[Chrysanthemum]", "type", "chaff", "kabu", 9, "nkabu", 9, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiku1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiku1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiku1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiku1.png" width="90" height="150" />' ) ) (set: const-type $kiku2 to (dm: "name", "a golden (text-color: (rgb:245,184,22))[Chrysanthemum]", "suit", "(text-color: (rgb:245,184,22))[Chrysanthemum]", "type", "chaff", "kabu", 9, "nkabu", 9, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiku2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiku2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiku2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiku2.png" width="90" height="150" />' ) ) (set: const-type $kiku3 to (dm: "name", "the (text-color: (rgb:245,184,22))[Chrysanthemum] with Blue ~~Ribbon~~", "suit", "(text-color: (rgb:245,184,22))[Chrysanthemum]", "type", "~~Ribbon~~", "kabu", 9, "nkabu", 9, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/kiku3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiku3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiku3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiku3.png" width="90" height="150" />' ) ) (set: const-type $kiku4 to (dm: "name", "the (text-color: (rgb:245,184,22))[Chrysanthemum] with //Sake Cup//", "suit", "(text-color: (rgb:245,184,22))[Chrysanthemum]", "type", "//Subject//", "kabu", 9, "nkabu", 9, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiku4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiku4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiku4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiku4.png" width="90" height="150" />' ) ) (set: const-type $maple1 to (dm: "name", "fallen (text-color: (rgb:211,26,5))[Maple] leaves", "suit", "(text-color: (rgb:211,26,5))[Maple]", "type", "chaff", "kabu", 10, "nkabu", 10, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/maple1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/maple1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/maple1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/maple1.png" width="90" height="150" />' ) ) (set: const-type $maple2 to (dm: "name", "gently drifting (text-color: (rgb:211,26,5))[Maple] leaves", "suit", "(text-color: (rgb:211,26,5))[Maple]", "type", "chaff", "kabu", 10, "nkabu", 10, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/maple2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/maple2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/maple2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/maple2.png" width="90" height="150" />' ) ) (set: const-type $maple3 to (dm: "name", "the (text-color: (rgb:211,26,5))[Maple] leaves with Blue ~~Ribbon~~", "suit", "(text-color: (rgb:211,26,5))[Maple]", "type", "~~Ribbon~~", "kabu", 10, "nkabu", 10, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/maple3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/maple3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/maple3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/maple3.png" width="90" height="150" />' ) ) (set: const-type $maple4 to (dm: "name", "the (text-color: (rgb:211,26,5))[Maple] tree with //Deer//", "suit", "(text-color: (rgb:211,26,5))[Maple]", "type", "//Subject//", "kabu", 10, "nkabu", 10, "val", 10, "honval", 20, "yamaval", 50, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/maple4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/maple4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/maple4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/maple4.png" width="90" height="150" />' ) ) (set: const-type $ame1 to (dm: "name", "the (text-color: (rgb:101,196,6))[Willow] with Lightning", "suit", "(text-color: (rgb:101,196,6))[Willow]", "type", "chaff", "kabu", 11, "nkabu", 2, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/ame1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/ame1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/ame1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/ame1.png" width="90" height="150" />' ) ) (set: const-type $ame2 to (dm: "name", "the (text-color: (rgb:101,196,6))[Willow] with Red ~~Ribbon~~", "suit", "(text-color: (rgb:101,196,6))[Willow]", "type", "~~Ribbon~~", "kabu", 11, "nkabu", 2, "val", 5, "honval", 5, "yamaval", 10, "sakuval", 10, "sudaval", 1, "hachival", 1, "louie", '<img src="https://paperflowers.neocities.org/louie/ame2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/ame2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/ame2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/ame2.png" width="90" height="150" />' ) ) (set: const-type $ame3 to (dm: "name", "the (text-color: (rgb:101,196,6))[Willow] with //Swallow//", "suit", "(text-color: (rgb:101,196,6))[Willow]", "type", "//Subject//", "kabu", 11, "nkabu", 2, "val", 10, "honval", 10, "yamaval", 10, "sakuval", 5, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/ame3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/ame3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/ame3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/ame3.png" width="90" height="150" />' ) ) (set: const-type $ame4 to (dm: "name", "the (text-color: (rgb:101,196,6))[Willow] with ''Rain Man and Frog''", "suit", "(text-color: (rgb:101,196,6))[Willow]", "type", "''Bright''", "kabu", 11, "nkabu", 2, "val", 20, "honval", 10, "yamaval", 50, "sakuval", 10, "sudaval", 5, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/ame4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/ame4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/ame4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/ame4.png" width="90" height="150" />' ) ) (set: const-type $kiri1 to (dm: "name", "just a normal (text-color: (rgb:186,163,222))[Princess Tree]", "suit", "(text-color: (rgb:186,163,222))[Princess Tree]", "type", "chaff", "kabu", 12, "nkabu", 6, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiri1.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiri1.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiri1.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiri1.png" width="90" height="150" />' ) ) (set: const-type $kiri2 to (dm: "name", "a (text-color: (rgb:186,163,222))[Princess Tree] with Japanese text", "suit", "(text-color: (rgb:186,163,222))[Princess Tree]", "type", "chaff", "kabu", 12, "nkabu", 6, "val", 1, "honval", 0, "yamaval", 0, "sakuval", 0, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiri2.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiri2.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiri2.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiri2.png" width="90" height="150" />' ) ) (set: const-type $kiri3 to (dm: "name", "a (text-color: (rgb:186,163,222))[Princess Tree] with a yellow bottom", "suit", "(text-color: (rgb:186,163,222))[Princess Tree]", "type", "chaff", "kabu", 12, "nkabu", 6, "val", 5, "honval", 0, "yamaval", 10, "sakuval", 10, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiri3.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiri3.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiri3.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiri3.png" width="90" height="150" />' ) ) (set: const-type $kiri4 to (dm: "name", "the (text-color: (rgb:186,163,222))[Princess Tree] with ''Phoenix''", "suit", "(text-color: (rgb:186,163,222))[Princess Tree]", "type", "''Bright''", "kabu", 12, "nkabu", 6, "val", 20, "honval", 30, "yamaval", 50, "sakuval", 20, "sudaval", 10, "hachival", 10, "louie", '<img src="https://paperflowers.neocities.org/louie/kiri4.svg" width="90" height="149" />', "sem", '<img src="https://paperflowers.neocities.org/sem/kiri4.png" width="75" height="150" />', "pixel", '<img src="https://paperflowers.neocities.org/pixel/kiri4.png" width="87" height="132" />', "heaven", '<img src="https://paperflowers.neocities.org/heaven/kiri4.png" width="90" height="150" />' ) ) (set: const-type $perfectdeck to (a: $pine1, $pine2, $pine3, $pine4, $plum1, $plum2, $plum3, $plum4, $cherry1, $cherry2, $cherry3, $cherry4, $fuji1, $fuji2, $fuji3, $fuji4, $iris1, $iris2, $iris3, $iris4, $peony1, $peony2, $peony3, $peony4, $hagi1, $hagi2, $hagi3, $hagi4, $grass1, $grass2, $grass3, $grass4, $kiku1, $kiku2, $kiku3, $kiku4, $maple1, $maple2, $maple3, $maple4, $ame1, $ame2, $ame3, $ame4, $kiri1, $kiri2, $kiri3, $kiri4)) (set: const-type $allbutame to (a: $pine1, $pine2, $pine3, $pine4, $plum1, $plum2, $plum3, $plum4, $cherry1, $cherry2, $cherry3, $cherry4, $fuji1, $fuji2, $fuji3, $fuji4, $iris1, $iris2, $iris3, $iris4, $peony1, $peony2, $peony3, $peony4, $hagi1, $hagi2, $hagi3, $hagi4, $grass1, $grass2, $grass3, $grass4, $kiku1, $kiku2, $kiku3, $kiku4, $maple1, $maple2, $maple3, $maple4, $kiri1, $kiri2, $kiri3, $kiri4)) (set: const-type $allbutchaff to (a: $pine3, $pine4, $plum3, $plum4, $cherry3, $cherry4, $fuji3, $fuji4, $iris3, $iris4, $peony3, $peony4, $hagi3, $hagi4, $grass3, $grass4, $kiku3, $kiku4, $maple3, $maple4, $ame1, $ame2, $ame3, $kiri3, $kiri4)) (set: $matsushima to (a: $pine1, $pine2, $pine3, $pine4)) (set: $umeshima to (a: $plum1, $plum2, $plum3, $plum4)) (set: $sakurashima to (a: $cherry1, $cherry2, $cherry3, $cherry4)) (set: $fgoroju to (a: $iris4, $kiri4, $maple4)) (set: $bgoroju to (a: $iris3, $kiri4, $maple3)) (set: $sanko to (a: $pine4, $plum4, $cherry4)) (set: $akatan to (a: $pine3, $plum3, $cherry3)) (set: $aotan to (a: $kiku3, $maple3, $peony3)) (set: $shiko to (a: $pine4, $cherry4, $kiri4, $grass4)) (set: $myphoenix to false, $hisphoenix to false) (set: $fujishima to (a: $fuji1, $fuji2, $fuji3, $fuji4)) (set: $kirishima to (a: $kiri1, $kiri2, $kiri3, $kiri4)) (set: $goko to $shiko + (a: $ame4)) (set: $makibo to (a: $pine4, $grass4, $kiri4)) (set: $kusa to (a: $fuji3, $iris3, $hagi3)) (set: $ishicho to (a: $peony4, $hagi4, $maple4)) (set: $nomi to (a: $cherry4, $grass4, $kiku4)) (set: $amezoro to (a: $ame1, $ame2, $ame3, $ame4)) (set: $ribbons to (a: $pine3, $plum3, $cherry3, $fuji3, $iris3, $peony3, $hagi3, $kiku3, $maple3, $ame3)) (set: $subjects to (a: $plum4, $fuji4, $iris4, $peony4, $hagi4, $grass3, $kiku4, $maple4, $ame3)) (set: $chaff to (a: $pine1, $pine2, $plum1, $plum2, $cherry1, $cherry2, $fuji1, $fuji2, $iris1, $iris2, $peony1, $peony2, $hagi1, $hagi2, $grass1, $grass2, $kiku1, $kiku2, $maple3, $maple4, $ame1, $kiri1, $kiri2, $kiri3)) (set: $godori to (a: $plum4, $fuji4, $grass3)) }

(print: "name" of $pine1) (print: "name" of $plum1) (print: "name" of $cherry1) (print: "name" of $fuji1) (print: "name" of $iris1) (print: "name" of $peony1) (print: "name" of $hagi1) (print: "name" of $grass1) (print: "name" of $kiku1) (print: "name" of $maple1) (print: "name" of $ame1) (print: "name" of $kiri1)

Double-click this passage to edit it.

[]<display| {|explore>[ (if: $x is 1)[(display: "explore a")] (if: $x is 2)[(display: "explore b")] (if: $x is 3)[(display: "explore c")] (if: $x is 4)[(display: "explore d")] (if: $x is 5)[(display: "explore e")] (if: $x is 6)[(display: "explore f")] (if: $x is 7)[(display: "explore g")] (if: $x is 8)[(display: "explore h")] (if: $x is 9)[(display: "explore i")] (if: $x is 10)[(display: "explore j")] (display: "ui") ]}

|UI>[{ (if: $x is 1)[(set: $xa to "A")] (elseif: $x is 2)[(set: $xa to "B")] (elseif: $x is 3)[(set: $xa to "C")] (elseif: $x is 4)[(set: $xa to "D")] (elseif: $x is 5)[(set: $xa to "E")] (elseif: $x is 6)[(set: $xa to "F")] (elseif: $x is 7)[(set: $xa to "G")] (elseif: $x is 8)[(set: $xa to "H")] (elseif: $x is 9)[(set: $xa to "I")] (else:)[(set: $xa to "J")] (set: $ya to (string: $y)) (set: $room to $xa + $ya) } |= [(link-repeat: "Go west")[(set: $x to it - 1) (rerun: ?UI) (append: ?display)[You go West. ] (rerun: ?explore)]]<west| =|= [(link-repeat: "Go north")[(set: $y to it - 1) (rerun: ?UI) (append: ?display)[You go North. ] (rerun: ?explore)]]<north| [(link-repeat: "Go south")[(set: $y to it + 1) (rerun: ?UI) (append: ?display)[You go South. ] (rerun: ?explore)]]<south| =|= [(link-repeat: "Go east")[(set: $x to it + 1) (rerun: ?UI) (append: ?display)[You go East. ] (rerun: ?explore)]]<east| =||| { (if: $room is "I10" and $lock2 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock2 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. Your key gets stuck in the lock, but at least the door opens now. ]]]] (if: $room is "I7" and $lock3 is true)[(hide: ?west) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock3 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. After several minutes of roughhousing with the rusty lock, you manage to turn the key, which snaps as soon as you push the door open. ]]]] (if: $room is "H6" and $lock4 is true)[(hide: ?west) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock4 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. The door is now unlocked. When you attempt to remove the key from the lock, however, the whole lock comes off with the key. They seem inextricably stuck at this point. Oh well. ]]]] (if: $room is "H5" and $lock5 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock5 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. Before you can put it back in your pocket, however, it slips from your fingers down through a grate near your feet. Whoops.]]]] (if: $room is "E9" and $lock6 is true)[(hide: ?west) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock6 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. And then the door spontaneously combusts, melting the key with it. What are the chances? ]]]] (if: $room is "G1" and $lock7 is true)[(hide: ?east) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock7 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. When you begin to turn the knob, however, you feel a bit faint. Your vision starts fading around the edges, going black, no, white, until you pass out. When you come to, the door is wide open, though the key is no longer in the lock. You pick yourself up slowly and prepare to trudge onwards. ]]]] (if: $room is "E6" and $lock8 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock8 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. Too busy wondering what sort of character would pop up in the next room, you manage to lose the miraculously unbroken key after unlocking the door. ]]]] (if: $room is "D5" and $lock9 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock9 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. The key goes all the way into the hole, falling inside the door. The key clinks around what you imagine must be a tiny rube goldberg machine inside the door, eventually depressing a pressure plate below, which causes the door to slide open. ]]]] (if: $room is "D9" and $lock10 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock10 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. As the lock clicks open, you feel a chill run from the keyhandle through your fingertips. You instinctively let go of the key, which begins to gather frost. You don't think you'll be able to safely remove it from the door. ]]]] (if: $room is "C9" and $lock11 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock11 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. Another unlocked door. Another broken key. ]]]] (if: $room is "B2" and $lock12 is true)[(hide: ?north) (if: $keys >= 1)[(link:"Use key")[(set: $keys to it - 1) (set: $lock12 to false) (rerun: ?UI) (append: ?display)[ You use the key on the door. The door is unlocked. The key is unusable. Seeing a pattern here? ]]]] } |==| You are in room $room. { (if: $room is in (a: "A1", "A2", "A3", "A4", "A5", "A6", "A7", "A8", "A9", "A10", "B2", "B3", "B5", "B7", "B9", "C2", "C6", "C9", "D3", "D4", "D6", "D7", "D8", "D9", "E2", "E3", "E4", "E10", "F1", "F3", "F5", "F6", "F7", "G2", "G3", "G4", "G5", "G7", "G8", "G10", "H2", "H3", "H8", "H9", "I2", "I4", "I5", "J2", "J3", "J6", "J7", "J8", "J10") )[(hide: ?west)] (if: $room is in (a: "A1", "A4", "A8", "A10", "B3", "B5", "B6", "B7", "B9", "B10", "C1", "C3", "C4", "C5", "C10", "D1", "D5", "D6", "D10", "E2", "E4", "E7", "E8", "E10", "F1", "F3", "F6", "F8", "F10", "G4", "G6", "G8", "G10", "H2", "H5", "H7", "H9", "H10", "I1", "I3", "I4", "I6", "I8", "I10", "J4", "J8", "J10") )[(hide: ?south)] (if: $room is in (a: "A1", "A2", "A5", "A9", "B1", "B4", "B6", "B7", "B8", "B10", "C1", "C2", "C4", "C5", "C6", "D1", "D2", "D6", "D7", "E1", "E3", "E5", "E8", "E9", "F1", "F2", "F4", "F7", "F9", "G1", "G5", "G4", "G7", "G9", "H1", "H3", "H6", "H8", "H10", "I1", "I2", "I4", "I5", "I7", "I9", "J1", "J5", "J9") )[(hide: ?north)] (if: $room is in (a: "A2", "A3", "A5", "A7", "A9", "B2", "B6", "B9", "C3", "C4", "C6", "C7", "C8", "C9", "D2", "D3", "D4", "D10", "E1", "E3", "E5", "E6", "E7", "F2", "F3", "F4", "F5", "F7", "F8", "F10", "G2", "G3", "G8", "G9", "H2", "H4", "H5", "I2", "I3", "I6", "I7", "I8", "I10", "J1", "J2", "J3", "J4", "J5", "J6", "J7", "J8", "J9", "J10") )[(hide: ?east)] }]

(if: $room is "A1") [(append: ?display)[]] (if: $room is "A2") [(append: ?display)[The moon stares at you drowzily, attempting a lazy blink so slow it would take a whole month to complete.]] (if: $room is "A3") [(append: ?display)[]] (if: $room is "A4") [(append: ?display)[]] (if: $room is "A5") [(append: ?display)[]] (if: $room is "A6") [(append: ?display)[]] (if: $room is "A7") [(append: ?display)[]] (if: $room is "A8") [(append: ?display)[]] (if: $room is "A9") [(append: ?display)[Surely this is the source of the aroma - a massive peony plant with flowers the size of your head. Hundreds of butterflies frolic in the air above, looking for the tastiest nectar from the fattest blooms.]] (if: $room is "A10") [(append: ?display)[]]

(if: $room is "B1") [(append: ?display)[]] (if: $room is "B2") [(append: ?display)[There's a door to your north. But it's locked. ]] (if: $room is "B3") [(append: ?display)[]] (if: $room is "B4") [(append: ?display)[]] (if: $room is "B5") [(append: ?display)[]] (if: $room is "B6") [(append: ?display)[The frogman croaks gently to himself, fingering his beard while he contemplates the blank canvas in front of him. Suddenly, in a flash, he cascades black ink furiously onto the scroll with deft precision, spilling not a drop of ink where he doesn't wish it.]] (if: $room is "B7") [(append: ?display)[]] (if: $room is "B8") [(append: ?display)[]] (if: $room is "B9") [(append: ?display)[]] (if: $room is "B10") [(append: ?display)[]]

(if: $room is "C1") [(append: ?display)[]] (if: $room is "C2") [(append: ?display)[]] (if: $room is "C3") [(append: ?display)[]] (if: $room is "C4") [(append: ?display)[]] (if: $room is "C5") [(append: ?display)[]] (if: $room is "C6") [(append: ?display)[]] (if: $room is "C7") [(append: ?display)[]] (if: $room is "C8") [(append: ?display)[]] (if: $room is "C9") [(append: ?display)[North, as it always seems to, leads to a locked door. ]] (if: $room is "C10") [(append: ?display)[]]

(if: $room is "D1") [(append: ?display)[]] (if: $room is "D2") [(append: ?display)[Ther's an old drunkard, round and red as a pomegranate, sipping sake from a shallow bowl.]] (if: $room is "D3") [(append: ?display)[]] (if: $room is "D4") [(append: ?display)[]] (if: $room is "D5") [(append: ?display)[There's a heavy-looking lock hanging on the door to your north. ]] (if: $room is "D6") [(append: ?display)[]] (if: $room is "D7") [(append: ?display)[]] (if: $room is "D8") [(append: ?display)[]] (if: $room is "D9") [(append: ?display)[To the north is a locked door. ]] (if: $room is "D10") [(append: ?display)[]]

(if: $room is "E1") [(append: ?display)[]] (if: $room is "E2") [(append: ?display)[]] (if: $room is "E3") [(append: ?display)[You hear a beautiful voice that sings of the changing seasons, but by the time you look over, the voice has already moved, leaving you staring instead at the crescent moon.]] (if: $room is "E4") [(append: ?display)[]] (if: $room is "E5") [(append: ?display)[]] (if: $room is "E6") [(append: ?display)[Locked door to the north. ]] (if: $room is "E7") [(append: ?display)[]] (if: $room is "E8") [(append: ?display)[]] (if: $room is "E9") [(append: ?display)[You notice the tall man, with his slender legs jutting out the bottom of his feathery robes, to your east. (if: $lock6 is true)[There's a door to the west, but it is firmly locked. ](else:)[There's also the door that you unlocked earlier to the west.]]] (if: $room is "E10") [(append: ?display)[You're directly to the west of the entrance. There are several cushions lining the walls for guests to sit on, along with a stout coffee table.]]

(if: $room is "F1") [(append: ?display)[]] (if: $room is "F2") [(append: ?display)[]] (if: $room is "F3") [(append: ?display)[A beautiful chimera of a bird, illustrious and overwhelmingly impressive.]] (if: $room is "F4") [(append: ?display)[]] (if: $room is "F5") [(append: ?display)[]] (if: $room is "F6") [(append: ?display)[]] (if: $room is "F7") [(append: ?display)[A proud but shy being dancing and beating a drum.]] (if: $room is "F8") [(append: ?display)[]] (if: $room is "F9") [(append: ?display)[ The tall man looms just before you. He looks decidedly birdlike in this lighting, which casts from his nose a sickle-beaked shadow. ]] (if: $room is "F10") [(append: ?display)[You're just inside the reception area. Your host, the tall man, beckons you to the room to your north. ]]

(if: $room is "G1") [(append: ?display)[To the east, for once, is a locked door. ]] (if: $room is "G2") [(append: ?display)[]] (if: $room is "G3") [(append: ?display)[]] (if: $room is "G4") [(append: ?display)[]] (if: $room is "G5") [(append: ?display)[]] (if: $room is "G6") [(append: ?display)[]] (if: $room is "G7") [(append: ?display)[]] (if: $room is "G8") [(append: ?display)[]] (if: $room is "G9") [(append: ?display)[]] (if: $room is "G10") [(append: ?display)[]]

(if: $room is "H1") [(append: ?display)[]] (if: $room is "H2") [(append: ?display)[]] (if: $room is "H3") [(append: ?display)[]] (if: $room is "H4") [(append: ?display)[]] (if: $room is "H5") [(append: ?display)[Directly to your north is yet another locked door. ]] (if: $room is "H6") [(append: ?display)[The western door is locked. ]] (if: $room is "H7") [(append: ?display)[]] (if: $room is "H8") [(append: ?display)[]] (if: $room is "H9") [(append: ?display)[]] (if: $room is "H10") [(append: ?display)[]]

(if: $room is "I1") [(append: ?display)[]] (if: $room is "I2") [(append: ?display)[The wooden girl who chases fireflies.]] (if: $room is "I3") [(append: ?display)[]] (if: $room is "I4") [(append: ?display)[The whale charges boarishly ahead.]] (if: $room is "I5") [(append: ?display)[]] (if: $room is "I6") [(append: ?display)[]] (if: $room is "I7") [(append: ?display)[There's a door to your west, but it's currently locked. ]] (if: $room is "I8") [(append: ?display)[]] (if: $room is "I9") [(append: ?display)[]] (if: $room is "I10") [(append: ?display)[The door to your north is clearly locked shut. ]]

(if: $room is "J1") [(append: ?display)[]] (if: $room is "J2") [(append: ?display)[]] (if: $room is "J3") [(append: ?display)[]] (if: $room is "J4") [(append: ?display)[]] (if: $room is "J5") [(append: ?display)[]] (if: $room is "J6") [(append: ?display)[]] (if: $room is "J7") [(append: ?display)[]] (if: $room is "J8") [(append: ?display)[A courtly figure veiled by a colorful curtain.]] (if: $room is "J9") [(append: ?display)[]] (if: $room is "J10") [(append: ?display)[Uguisu-Jo calls out, announcing the start of spring.]]

{ (set: $glasses to "sem") (display: "hanafuda constants") (set: $field to $perfectdeck) }(if:$glasses is "name") [{ =><= ''The Field'' <== |== (if: length of $field >= 1)[(print: "name" of 1st of $field)]<f1| (if: length of $field >= 3)[ (print: "name" of 3rd of $field)]<f3| (if: length of $field >= 5)[ (print: "name" of 5th of $field)]<f5| (if: length of $field >= 7)[ (print: "name" of 7th of $field)]<f7| (if: length of $field >= 9)[ (print: "name" of 9th of $field)]<f9| (if: length of $field >= 11)[ (print: "name" of 11th of $field)]<f11| (if: length of $field >= 13)[ (print: "name" of 13th of $field)]<f13| (if: length of $field >= 15)[ (print: "name" of 15th of $field)]<f15| (if: length of $field >= 17)[ (print: "name" of 17th of $field)]<f17| ==| ==> (if: length of $field >= 2)[(print: "name" of 2nd of $field)]<f2| (if: length of $field >= 4)[ (print: "name" of 4th of $field)]<f4| (if: length of $field >= 6)[ (print: "name" of 6th of $field)]<f6| (if: length of $field >= 8)[ (print: "name" of 8th of $field)]<f8| (if: length of $field >= 10)[ (print: "name" of 10th of $field)]<f10| (if: length of $field >= 12)[ (print: "name" of 12th of $field)]<f12| (if: length of $field >= 14)[ (print: "name" of 14th of $field)]<f14| (if: length of $field >= 16)[ (print: "name" of 16th of $field)]<f16| (if: length of $field >= 18)[ (print: "name" of 18th of $field)]<f18| |==| <== }](else:)[ =><= ''The Field'' <== (if: length of $field >= 1)[(print: $glasses of 1st of $field)]<f1|` `(if: length of $field >= 2)[(print: $glasses of 2st of $field)]<f2|` `(if: length of $field >= 3)[(print: $glasses of 3st of $field)]<f3|` `(if: length of $field >= 4)[(print: $glasses of 4st of $field)]<f4|` `(if: length of $field >= 5)[(print: $glasses of 5st of $field)]<f5|` `(if: length of $field >= 6)[(print: $glasses of 6st of $field)]<f6|` `(if: length of $field >= 7)[(print: $glasses of 7rd of $field)]<f7|` `(if: length of $field >= 8)[(print: $glasses of 8rd of $field)]<f8|` `(if: length of $field >= 9)[(print: $glasses of 9rd of $field)]<f9|` `(if: length of $field >= 10)[(print: $glasses of 10rd of $field)]<f10|` `(if: length of $field >= 11)[(print: $glasses of 11rd of $field)]<f11|` `(if: length of $field >= 12)[(print: $glasses of 12rd of $field)]<f12|` `(if: length of $field >= 13)[(print: $glasses of 13th of $field)]<f13|` `(if: length of $field >= 14)[(print: $glasses of 14th of $field)]<f14|` `(if: length of $field >= 15)[(print: $glasses of 15th of $field)]<f15|` `(if: length of $field >= 16)[(print: $glasses of 16th of $field)]<f16|` `(if: length of $field >= 17)[(print: $glasses of 17th of $field)]<f17|` `(if: length of $field >= 18)[(print: $glasses of 18th of $field)]<f18| |==| ]

=><= ''Your Hand'' <== |== { (if: length of $myhand >= 1)[(print: "glasses" of 1st of $myhand)]<h1| (if: length of $myhand >= 3)[ (print: "glasses" of 3rd of $myhand)]<h3| (if: length of $myhand >= 5)[ (print: "glasses" of 5th of $myhand)]<h5| (if: length of $myhand >= 7)[ (print: "glasses" of 7th of $myhand)]<h7| (if: length of $myhand >= 9)[ (print: "glasses" of 9th of $myhand)]<h9| } ==| ==> { (if: length of $myhand >= 2)[(print: "glasses" of 2nd of $myhand)]<h2| (if: length of $myhand >= 4)[ (print: "glasses" of 4th of $myhand)]<h4| (if: length of $myhand >= 6)[ (print: "glasses" of 6th of $myhand)]<h6| (if: length of $myhand >= 8)[ (print: "glasses" of 8th of $myhand)]<h8| (if: length of $myhand >= 10)[ (print: "glasses" of 10th of $myhand)]<h10| } |==|